home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d13 / pctv2n2.arc / TEST.ACT < prev    next >
Text File  |  1991-08-11  |  187b  |  11 lines
  1. now(Object);
  2.  
  3. Def test(self)
  4. {  printLine(tuple("Current method: ", currentMethod() ));
  5.    printLine(tuple("Called from: ", calledFrom() ));
  6. }
  7.  
  8. Def test2(self)
  9. {  test(self)
  10. }
  11.